برترین سورس های ویژال بیسیک 6
آموزشی و همه چی
8 تير 1389برچسب:, :: 6:46 قبل از ظهر :: نويسنده : حسام بخشعلی زاده

2 OCX زیبا

امروز 2 OCX زیبا برای زیبا سازی برنامه هاتون گذاشتم.... چیزه جالبیه

می تونین تو برنامه هاتون اشتفاده کنید

 

دانلود با حجم ۱۳۸ کیلو بایت

رمز :vb6

6 تير 1389برچسب:, :: 7:31 قبل از ظهر :: نويسنده : حسام بخشعلی زاده

مرجع کامل خطا های مودم

این برنامه که ساخت خودمه بانک کل خطا های مودم رو داره...

حتما دانلود کنید...

vb6

دانلود با حجم۹۰ کیلوبایت...

رمز : vb6

6 تير 1389برچسب:, :: 7:31 قبل از ظهر :: نويسنده : حسام بخشعلی زاده

HDIC2000

نام نرم افزاری که خودم با وی بی نوشتمش یک فرهنگ لغت با ۴۶۷۴۳ لغت !

البته دارای ۲۰۰ کلمه ی مختصار مربوط به کامژیوتر هم هست...

از نظر زیبایی هم بد نیست...

حتما دانلود کنید...

vb6

دانلود کد سورس با حجم ۱.۷۰ مگابایت...

رمز : vb6

4 تير 1389برچسب:, :: 6:40 قبل از ظهر :: نويسنده : حسام بخشعلی زاده

آموزش Access 1 قسمت اول

این آموزش با طراحی خودم توش در مورد نحو ه ی اتصال وی بی
به بانک رو نوشتم بعدش هم ...در آموزش بعدی میتونین کلیات رو

یاد بگیرید.... ۲ تا کد سورس هم گذاشتم در مورد همین بانک

 

حتما دانلودش کن

 

دانلود با حجم ۳۴۷ کیلوبایت

رمز : vb6

4 تير 1389برچسب:, :: 6:19 قبل از ظهر :: نويسنده : حسام بخشعلی زاده

API Text Viewer

این برنامه حاوی ۲۰۰ تابع API موفید برای کسانی که در حال یادگیری

کار با API هستند....

vb6

دانلود با حجم ۱۷۵

رمز : vb6

 

2 تير 1389برچسب:, :: 6:33 قبل از ظهر :: نويسنده : حسام بخشعلی زاده

کد سورس farsi Convert

این کد سورس عدد فارسی رو تا ۱۲ رقم می گیره

بعدش به حروف تبدیل می کنه...

vb6

دانلود با حجم ۵۰ کیلوبایت

رمز :vb6

2 تير 1389برچسب:, :: 6:29 قبل از ظهر :: نويسنده : حسام بخشعلی زاده

کد سورس Snow

این سورس خیلی جالبه با این سورس روی فرم بف میباره...

خوشتون میاد...

vb6

دانلود با حجم ۶۰ کیلوبایت

رمز : vb6

2 تير 1389برچسب:, :: 6:25 قبل از ظهر :: نويسنده : حسام بخشعلی زاده

بخش کننده ی ETBDX Player

این بخش کننده خیلی زیبا و جالبه و طراحش من نیستم فقط براتون گذاشتمش

هم کد سورسش بدرد می خوره و هم میتونین برنامه روب به عنوان یه برنامه ی

کاربردی ازش استفاده کنین... (نظر یادتون نره)

vb6

دانلود کد با حجم ۱۵۷ کیلوبایت

رمز : vb6

31 خرداد 1389برچسب:, :: 8:37 بعد از ظهر :: نويسنده : حسام بخشعلی زاده

نمایش درایو های موجود

به روش زیر عمل کنید....

Public Declare Function GetLogicalDriveStrings Lib "kernel32" Alias "GetLogicalDriveStringsA"
(ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long

--------------------------------------------------------------------------------------------------

Private Sub Form_Load()
     Dim StrBuffer As String
     Me.AutoRedraw = True
     StrBuffer = String(255, Chr$(0))
     ret& = GetLogicalDriveStrings(255, StrBuffer)
     For I = 1 To 100
            If  Left$(StrBuffer, InStr(1, StrBuffer, Chr$(0))) = Chr$(0) Then  Exit For
            Me.Print Left$(StrBuffer, InStr(1, StrBuffer, Chr$(0)) – 1)
            StrBuffer = Right$(StrBuffer, Len(StrBuffer) - InStr(1, StrBuffer, Chr$(0)))
     Next I
End Sub

موفق باشید...

31 خرداد 1389برچسب:, :: 8:35 بعد از ظهر :: نويسنده : حسام بخشعلی زاده

جستوجوی یک فایل

برای این کار به روش زیر عمل کنید

Public  Declare  Function  SearchTreeForFile  Lib  "imagehlp"  (ByVal  RootPath  As  String,  ByVal
InputPathName As String, ByVal OutputPathBuffer As String) As Long
Public Const MAX_PATH = 260

---------------------------------------------------------------------------------------------------

 

Private Sub Form_Load()
     Dim TempStr As String
     Dim Result As Long
     TempStr = String(MAX_PATH, 0)
     Result = SearchTreeForFile("C:\", "Ali.txt", TempStr)
     If  Result <> 0 Then
          MsgBox "Located file at " + Left$(TempStr, InStr(1, TempStr, Chr$(0)) – 1)
     Else
           MsgBox " File not found "
     End If
End Sub

موفق باشید....

موضوعات
پيوندها


ورود اعضا:

<-PollName->

<-PollItems->

خبرنامه وب سایت:





آمار وب سایت:
 

بازدید امروز : 16
بازدید دیروز : 2
بازدید هفته : 16
بازدید ماه : 128
بازدید کل : 222881
تعداد مطالب : 86
تعداد نظرات : 43
تعداد آنلاین : 1